home *** CD-ROM | disk | FTP | other *** search
/ Revista CD Expert 37 / CD Expert nº 37.iso / LastCall / lastcall.exe / stuff / recipe.dxr / 00041_Help subject line.ls < prev    next >
Encoding:
Text File  |  2000-03-23  |  351 b   |  20 lines
  1. property pSpr
  2. global gHelpTopicNumber
  3.  
  4. on beginSprite me
  5.   pSpr = sprite(me.spriteNum)
  6.   if gHelpTopicNumber = 0 then
  7.     mRefresh(me, "Pick a Topic from the list below")
  8.   end if
  9. end
  10.  
  11. on mRefresh me, newText
  12.   if not isText(pSpr) then
  13.     exit
  14.   end if
  15.   if voidp(newText) or (newText = EMPTY) then
  16.     exit
  17.   end if
  18.   pSpr.member.text = newText
  19. end
  20.